(pgg-gpg-process-region): Make USE-AGENT nil if PASSPHRASE is given.

diff --git a/lisp/pgg-gpg.el b/lisp/pgg-gpg.el
index 84bf81a858e0c04d60fdc15a0545c0f79463cfe0..a2cd14eaae38db62f0d972063d6ec9ce97e7690f 100644 (file)
--- a/lisp/pgg-gpg.el
+++ b/lisp/pgg-gpg.el
@@ -61,7 +61,7 @@
   "GnuPG ID of your default identity.")
 
 (defun pgg-gpg-process-region (start end passphrase program args)
-  (let* ((use-agent (pgg-gpg-use-agent-p)) 
+  (let* ((use-agent (and (null passphrase) (pgg-gpg-use-agent-p)))
         (output-file-name (pgg-make-temp-file "pgg-output"))
         (args
          `("--status-fd" "2"